home *** CD-ROM | disk | FTP | other *** search
/ Inter.Net 55-1 / Inter.Net 55-1.iso / CBuilder / Setup / BCB / data.z / dbcombo.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-02-09  |  3.7 KB  |  114 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'DBCombo.pas' rev: 3.00
  6.  
  7. #ifndef DBComboHPP
  8. #define DBComboHPP
  9. #include <Controls.hpp>
  10. #include <StdCtrls.hpp>
  11. #include <FileCtrl.hpp>
  12. #include <Graphics.hpp>
  13. #include <Classes.hpp>
  14. #include <SysUtils.hpp>
  15. #include <Windows.hpp>
  16. #include <SysInit.hpp>
  17. #include <System.hpp>
  18.  
  19. //-- user supplied -----------------------------------------------------------
  20.  
  21. namespace Dbcombo
  22. {
  23. //-- type declarations -------------------------------------------------------
  24. class DELPHICLASS TAliasDrive;
  25. class PASCALIMPLEMENTATION TAliasDrive : public Filectrl::TDriveComboBox 
  26. {
  27.     typedef Filectrl::TDriveComboBox inherited;
  28.     
  29. private:
  30.     Graphics::TBitmap* FAliasBitmap;
  31.     Classes::TStrings* FAliasList;
  32.     void __fastcall LoadBitmaps(void);
  33.     void __fastcall FreeBitmaps(void);
  34.     
  35. protected:
  36.     virtual void __fastcall BuildList(void);
  37.     DYNAMIC void __fastcall Click(void);
  38.     
  39. public:
  40.     __fastcall virtual TAliasDrive(Classes::TComponent* AOwner);
  41.     __fastcall virtual ~TAliasDrive(void);
  42.     void __fastcall AddAliases(Classes::TStrings* Value);
  43.     bool __fastcall SetAlias(const System::AnsiString EditText);
  44.     __property Graphics::TBitmap* AliasBitmap = {read=FAliasBitmap};
  45.     __property Classes::TStrings* AliasList = {read=FAliasList};
  46. public:
  47.     /* TWinControl.CreateParented */ __fastcall TAliasDrive(HWND ParentWindow) : Filectrl::TDriveComboBox(
  48.         ParentWindow) { }
  49.     
  50. };
  51.  
  52. class DELPHICLASS TAliasListBox;
  53. class PASCALIMPLEMENTATION TAliasListBox : public Filectrl::TDirectoryListBox 
  54. {
  55.     typedef Filectrl::TDirectoryListBox inherited;
  56.     
  57. private:
  58.     bool FShowAlias;
  59.     System::AnsiString FAliasName;
  60.     Graphics::TBitmap* FAliasBitmap;
  61.     void __fastcall SetAliasBitmap(Graphics::TBitmap* Value);
  62.     
  63. protected:
  64.     virtual void __fastcall BuildList(void);
  65.     
  66. public:
  67.     __fastcall virtual TAliasListBox(Classes::TComponent* AOwner);
  68.     __fastcall virtual ~TAliasListBox(void);
  69.     __property System::AnsiString AliasName = {read=FAliasName, write=FAliasName};
  70.     __property Graphics::TBitmap* AliasBitmap = {read=FAliasBitmap, write=SetAliasBitmap};
  71.     __property bool ShowAlias = {read=FShowAlias, write=FShowAlias, nodefault};
  72. public:
  73.     /* TWinControl.CreateParented */ __fastcall TAliasListBox(HWND ParentWindow) : Filectrl::TDirectoryListBox(
  74.         ParentWindow) { }
  75.     
  76. };
  77.  
  78. class DELPHICLASS TAliasFileListBox;
  79. class PASCALIMPLEMENTATION TAliasFileListBox : public Filectrl::TFileListBox 
  80. {
  81.     typedef Filectrl::TFileListBox inherited;
  82.     
  83. protected:
  84.     Classes::TStringList* FTableList;
  85.     bool FShowAlias;
  86.     System::AnsiString FAliasName;
  87.     bool FSystem;
  88.     virtual void __fastcall ReadFileNames(void);
  89.     virtual void __fastcall ReadBitmaps(void);
  90.     
  91. public:
  92.     __fastcall virtual TAliasFileListBox(Classes::TComponent* AOwner);
  93.     __fastcall virtual ~TAliasFileListBox(void);
  94.     __property Classes::TStringList* TableList = {read=FTableList};
  95.     __property bool ShowAlias = {read=FShowAlias, write=FShowAlias, nodefault};
  96.     __property System::AnsiString AliasName = {read=FAliasName, write=FAliasName};
  97.     __property bool System = {read=FSystem, write=FSystem, nodefault};
  98. public:
  99.     /* TWinControl.CreateParented */ __fastcall TAliasFileListBox(HWND ParentWindow) : Filectrl::TFileListBox(
  100.         ParentWindow) { }
  101.     
  102. };
  103.  
  104. //-- var, const, procedure ---------------------------------------------------
  105. extern PACKAGE void __fastcall ProcessAlias(System::AnsiString EditText, System::AnsiString &Alias, 
  106.     System::AnsiString &DirPart, System::AnsiString &FilePart);
  107.  
  108. }    /* namespace Dbcombo */
  109. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  110. using namespace Dbcombo;
  111. #endif
  112. //-- end unit ----------------------------------------------------------------
  113. #endif    // DBCombo
  114.